"
Description
--------------------

BottomBorder is a border style that will fill only the bottom of the rectangle.

Public API and Key Messages
--------------------

- #trimSize: 	This option allow to trim the bottom border

Examples
--------------------

	BottomBorder new
		width: 1;
		baseColor: Color white;
		trimSize: 2;
		yourself	
 
Internal Representation and Key Implementation Points.
--------------------

    Instance Variables
	trimSize:		<anInteger>		An amount of pixel to trim from both side of the bottom border

"
Class {
	#name : 'BottomBorderStyle',
	#superclass : 'SimpleBorderStyle',
	#instVars : [
		'trimSize'
	],
	#category : 'Morphic-Base-Borders',
	#package : 'Morphic-Base',
	#tag : 'Borders'
}

{ #category : 'drawing' }
BottomBorderStyle >> frameRectangle: aRectangle on: aCanvas [
	self drawLineFrom: aRectangle bottomLeft + (self trimSize @ 0) to: aRectangle bottomRight - (self trimSize @ 0) on: aCanvas
]

{ #category : 'accessing' }
BottomBorderStyle >> trimSize [
	^ trimSize ifNil: [ trimSize := 0 ]
]

{ #category : 'accessing' }
BottomBorderStyle >> trimSize: anObject [
	trimSize := anObject
]
